; Music of Mask Two (1988) (Gremlin Graphics) (Ben Daglish)
; Ripped by Megachur the 16/11/2006

	write "MASKTWO.BIN"

music_date_rip	equ &10b6
music_adr	equ &1130
first_theme	equ 0
last_theme	equ 0 ; 1 = nothing

	read "music_header_v1_0.asm"

;1130
	jp l1814	; init
	jp l125e	; play
;
.stop_music
;
	push af
	jp l17f4
.l113a
.music_end
	db #00
.l113b
	db #00,#09,#51,#7f,#0a,#02,#3f,#00
	db #0c,#00,#08,#81,#08,#0a,#02,#ff
	db #00,#0c,#0d,#08,#41,#59,#79,#05
	db #13,#00,#0d,#03,#08,#41,#09,#0a
	db #02,#55,#00,#0d,#00,#08,#11,#07
	db #0a,#02,#7f,#00,#0c,#00,#08,#00
	db #ed,#0a,#02,#7f,#00,#0c,#00,#08
	db #00,#07,#0a,#02,#7f,#08,#0c,#11
	db #08,#41,#0a,#0a,#02,#ff,#10,#0c
	db #00,#08,#21,#0a,#0a,#02,#7f,#10
	db #0c,#00,#08,#81,#3a,#0a,#02,#7f
	db #00,#0c
.l1195
	db #00,#09,#12,#1b,#24,#2d,#36,#3f
	db #00,#09,#12,#1b,#24,#2d,#36,#3f
	db #00,#09,#12,#1b,#24,#2d,#36,#3f
	db #00,#09,#12,#1b,#24,#2d,#36,#3f
	db #00,#09,#12,#1b,#24,#2d,#36,#3f
	db #00,#09,#12,#1b,#24
.l11c8 equ $ + 6
.l11c7 equ $ + 5
.l11c5 equ $ + 3
	db #2d,#36,#3f,#00,#00,#00,#b8,#0f
.l11d0 equ $ + 6
.l11ce equ $ + 4
.l11cd equ $ + 3
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
.l11ec equ $ + 2
.l11eb equ $ + 1
.l11ea
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
.l11fd equ $ + 3
.l11fa
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
.l1219 equ $ + 7
.l1218 equ $ + 6
.l1217 equ $ + 5
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00
.l1227
	db #00,#00,#00
.l122a
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
.l1246 equ $ + 4
.l1245 equ $ + 3
.l1244 equ $ + 2
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
.l1258 equ $ + 6
.l1256 equ $ + 4
.l1254 equ $ + 2
	db #00,#00,#00,#00,#00,#00,#00,#00
.l125a
	db #00,#00,#00
.l125d
	db #00
;
.play_music
.l125e
;
	ld hl,l11c7
	ld a,(l11d0)
	dec a
	jr nz,l126b
	ld (l11d0),a
	inc (hl)
.l126b
	ld a,(l11fd)
	dec a
	jr nz,l1275
	ld (l11fd),a
	inc (hl)
.l1275
	ld a,(l122a)
	dec a
	jr nz,l127f
	ld (l122a),a
	inc (hl)
.l127f
	xor a
	ld (l125d),a
	ld ix,l11cd
	ld (l144f),a
	ld hl,(l11c5)
	ld a,(hl)
	inc hl
	ld h,(hl)
	ld l,a
	ld (l1391),hl
	ld (l184c),hl
	ld (l185f),hl
	ld (l187d),hl
	ld de,(l1254)
	call l135f
	ld ix,l11fa
	ld a,#01
	ld (l125d),a
	ld hl,(l11c5)
	inc hl
	inc hl
	ld a,(hl)
	inc hl
	ld h,(hl)
	ld l,a
	ld (l1391),hl
	ld (l184c),hl
	ld (l185f),hl
	ld (l187d),hl
	ld a,#08
	ld (l144f),a
	ld de,(l1256)
	call l135f
	ld ix,l1227
	ld a,#02
	ld (l125d),a
	ld hl,(l11c5)
	ld de,#0004
	add hl,de
	ld a,(hl)
	inc hl
	ld h,(hl)
	ld l,a
	ld (l1391),hl
	ld (l184c),hl
	ld (l185f),hl
	ld (l187d),hl
	ld a,#10
	ld (l144f),a
	ld de,(l1258)
	call l135f
	ld de,#c000
	ld hl,#f680
	ld a,(l11c7)
	or a
	jr nz,l1356
.l1306
	ld c,#00
	ld a,(l11ea)
	call l1c4e
	inc c
	ld a,(l11eb)
	call l1c4e
	inc c
	ld a,(l1217)
	call l1c4e
	inc c
	ld a,(l1218)
	call l1c4e
	inc c
.l1325 equ $ + 1
	ld a,#00
	cp #01
	jr nc,l133f
	ld a,(l1244)
	call l1c4e
	inc c
	ld a,(l1245)
	call l1c4e
	ld c,#0a
	ld a,(l1246)
	call l1c4e
.l133f
	ld c,#07
	ld a,(l11c8)
	call l1c4e
	ld c,#08
	ld a,(l11ec)
	call l1c4e
	inc c
	ld a,(l1219)
	call l1c4e
.l1356
	xor a
	ld (l11c7),a
	ld c,#0e
	jp l1c4e
.l135f
	ld a,(ix+#03)
	or a
	jp nz,l15c9
	ld a,(ix+#11)
	cp #ff
	jr z,l1371
	ld (ix+#11),#00
.l1371
	ld l,(ix+#02)
	ld h,#00
	add hl,de
	ld a,(hl)
	cp #ff
	jr nz,l13e8
	ld a,(ix+#04)
	or a
	jr z,l138b
	dec (ix+#04)
	ld (ix+#02),#00
	jr l1371
.l138b
	ld l,(ix+#00)
	ld h,#00
.l1391 equ $ + 1
	ld bc,l197f
	add hl,bc
	ld a,(hl)
	inc (ix+#00)
	cp #ff
	jp z,l17f4
	bit 7,a
	jp z,l13c5
	ld l,a
	and #1f
	ld (l125a),a
	ld a,l
	and #60
	srl a
	srl a
	srl a
	ld (l13b5),a
.l13b5 equ $ + 1
.l13b4
	jr l13b4
	jp l1859
	db #00
	jp l1890
	db #00
	jp l1846
	db #00
	jp l186c
.l13c5
	ld c,a
	ld a,(l125d)
	add a
	ld e,a
	ld d,#00
	ld b,d
	ld hl,l1a2c
	add hl,bc
	ld a,(hl)
	ld hl,l1a45
	add hl,bc
	ld b,(hl)
	ld hl,l1254
	add hl,de
	ld (hl),a
	inc hl
	ld (hl),b
	ld e,a
	ld d,b
	ld (ix+#02),#00
	jp l1371
.l13e8
	bit 7,a
	jp z,l153d
	cp #a0
	jr nz,l1403
	inc (ix+#02)
	call l189a
	ld (ix+#16),a
	ld (ix+#03),a
	inc (ix+#02)
	jp l15d2
.l1403
	cp #90
	jr c,l144c
	cp #c0
	jr c,l1434
	ld (ix+#15),a
	and #1f
	ld (ix+#14),a
	inc (ix+#02)
	call l189a
	ld (ix+#12),a
	inc (ix+#02)
	call l189a
	ld (ix+#13),a
	inc (ix+#02)
	call l189a
	ld (ix+#11),a
	inc (ix+#02)
	jp l1371
.l1434
	cp #bf
	jr nz,l143e
	ld (ix+#11),#00
	jr l1446
.l143e
	and #0f
	add a
	add a
	add a
	ld (ix+#10),a
.l1446
	inc (ix+#02)
	jp l1371
.l144c
	and #0f
.l144f equ $ + 1
	add #00
	ld l,a
	ld h,#00
	ld bc,l1195
	add hl,bc
	ld l,(hl)
	ld h,#00
	ld bc,l113b
	add hl,bc
	push hl
	pop iy
	ld a,(iy+#08)
	ld (ix+#2b),a
	ld hl,l11c8
	ld a,(l125d)
	or a
	jr nz,l1480
	res 3,(hl)
	set 0,(hl)
	bit 7,(iy+#02)
	jr nz,l14a1
	set 3,(hl)
	res 0,(hl)
	jr l14a1
.l1480
	dec a
	jr nz,l1493
	set 1,(hl)
	res 4,(hl)
	bit 7,(iy+#02)
	jr nz,l14a1
	res 1,(hl)
	set 4,(hl)
	jr l14a1
.l1493
	set 2,(hl)
	res 5,(hl)
	bit 7,(iy+#02)
	jr nz,l14a1
	res 2,(hl)
	set 5,(hl)
.l14a1
	ld (ix+#24),#0f
	ld (ix+#25),#01
	ld a,(iy+#03)
	push af
	and #f0
	jr z,l14cf
	rrca
	rrca
	rrca
	rrca
	ld c,a
	ld b,#00
	ld hl,l1c2e
	add hl,bc
	ld a,(hl)
	bit 7,a
	jr nz,l14c6
	ld (ix+#24),a
	jr l14cf
.l14c6
	and #7f
	ld (ix+#25),a
	ld (ix+#24),#01
.l14cf
	ld a,(iy+#04)
	and #f0
	rrca
	rrca
	rrca
	rrca
	ld (ix+#20),a
	ld (ix+#21),#0f
	ld (ix+#22),#01
	pop af
	and #0f
	jr z,l1502
	ld c,a
	ld b,#00
	ld hl,l1c3e
	add hl,bc
	ld a,(hl)
	bit 7,(hl)
	jr nz,l14f9
	ld (ix+#21),a
	jr l1502
.l14f9
	and #7f
	ld (ix+#22),a
	ld (ix+#21),#01
.l1502
	ld (ix+#27),#0f
	ld (ix+#28),#01
	ld a,(iy+#04)
	and #0f
	jr z,l152b
	ld c,a
	ld b,#00
	ld hl,l1c3e
	add hl,bc
	ld a,(hl)
	bit 7,a
	jr nz,l1522
	ld (ix+#27),a
	jr l152b
.l1522
	and #7f
	ld (ix+#28),a
	ld (ix+#27),#01
.l152b
	ld a,(iy+#05)
	ld (ix+#06),a
	ld a,(iy+#07)
	ld (ix+#0b),a
	inc (ix+#02)
	jp l1371
.l153d
	add #14
	add (ix+#01)
	ld c,a
	ld b,#00
	ld (ix+#1c),a
	ld hl,l18a3
	add hl,bc
	ld a,(hl)
	ld hl,l18f7
	add hl,bc
	ld h,(hl)
	ld l,a
	ld c,(ix+#09)
	add hl,bc
	ld (ix+#1d),l
	ld (ix+#1e),h
	set 0,(ix+#2a)
	xor a
	ld (ix+#26),a
	ld (ix+#23),a
	ld (ix+#29),a
	ld (ix+#1f),a
	res 7,(ix+#25)
	res 7,(ix+#22)
	res 7,(ix+#28)
	ld l,(ix+#02)
	ld h,#00
	inc l
	add hl,de
	ld a,(hl)
	inc (ix+#02)
	inc (ix+#02)
	ex af,af'
	ld a,(ix+#0b)
	or a
	jr z,l159e
	ld l,a
	ld h,#00
	ld bc,l1943
	add hl,bc
	ld a,(hl)
	ld (ix+#0a),a
	ld (ix+#0c),#01
.l159e
	ld a,(ix+#10)
	or a
	jr z,l15bc
	ld l,a
	ld h,#00
	ld bc,l1953
	add hl,bc
	ld a,(hl)
	and #78
	srl a
	srl a
	srl a
	inc a
	ld (ix+#18),a
	ld (ix+#17),#01
.l15bc
	ld a,(ix+#15)
	and #1f
	ld (ix+#14),a
	ex af,af'
	ld (ix+#03),a
	ret
.l15c9
	cp (ix+#06)
	jr nz,l15d2
	res 0,(ix+#2a)
.l15d2
	ld a,(ix+#16)
	or a
	jr z,l15e1
	dec (ix+#16)
	ret nz
	ld (ix+#03),#00
	ret
.l15e1
	dec (ix+#03)
	ld a,(l11c7)
	or a
	ret nz
	bit 0,(ix+#2a)
	jr z,l1653
	bit 7,(ix+#25)
	jr nz,l1620
	inc (ix+#26)
	ld a,(ix+#26)
	cp (ix+#25)
	jr nz,l167d
	ld (ix+#26),#00
	ld a,(ix+#24)
	add (ix+#1f)
	cp (ix+#2b)
	jr c,l161b
	ld a,(ix+#2b)
	ld (ix+#1f),a
	set 7,(ix+#25)
	jr l167d
.l161b
	ld (ix+#1f),a
	jr l167d
.l1620
	bit 7,(ix+#22)
	jr nz,l167d
	inc (ix+#23)
	ld a,(ix+#23)
	cp (ix+#22)
	jr nz,l167d
	ld (ix+#23),#00
	ld a,(ix+#1f)
	sub (ix+#21)
	jr nc,l1649
.l163d
	ld a,(ix+#20)
	ld (ix+#1f),a
	set 7,(ix+#22)
	jr l167d
.l1649
	cp (ix+#20)
	jr c,l163d
	ld (ix+#1f),a
	jr l167d
.l1653
	bit 7,(ix+#28)
	jr nz,l167d
	inc (ix+#29)
	ld a,(ix+#29)
	cp (ix+#28)
	jr nz,l167d
	ld (ix+#29),#00
	ld a,(ix+#1f)
	sub (ix+#27)
	jr nc,l167a
	ld (ix+#1f),#00
	set 7,(ix+#28)
	jr l167d
.l167a
	ld (ix+#1f),a
.l167d
	ld a,(ix+#0b)
	or a
	jp z,l1708
	ld a,(ix+#0a)
	or a
	jr z,l169a
	bit 7,a
	jr z,l1694
	and #7f
	jr z,l1708
	jr l169a
.l1694
	dec (ix+#0a)
	jp l1708
.l169a
	ld a,(ix+#0c)
	and #7f
	add (ix+#0b)
	ld l,a
	ld h,#00
	ld bc,l1943
	add hl,bc
	ld a,(hl)
	ld (l125a),a
	bit 7,a
	jr z,l16cd
	neg
	ld (l125a),a
	bit 7,(ix+#0c)
	jr nz,l16d9
.l16bc
	ld hl,l125a
	ld a,(ix+#1d)
	sub (hl)
	ld (ix+#1d),a
	jr nc,l16e7
	dec (ix+#1e)
	jr l16e7
.l16cd
	ld a,(l125a)
	ld (l125a),a
	bit 7,(ix+#0c)
	jr nz,l16bc
.l16d9
	ld a,(l125a)
	add (ix+#1d)
	ld (ix+#1d),a
	jr nc,l16e7
	inc (ix+#1e)
.l16e7
	inc (ix+#0c)
	ld a,(ix+#0c)
	and #7f
	cp #08
	jr nz,l1708
	ld a,(ix+#0c)
	xor #89
	ld (ix+#0c),a
	cp #01
	jr nz,l1708
	ld a,(ix+#0a)
	or a
	jr z,l1708
	dec (ix+#0a)
.l1708
	ld a,(ix+#10)
	or a
	jp z,l17a3
	dec (ix+#18)
	jp nz,l17a3
	add (ix+#17)
	ld l,a
	ld h,#00
	ld bc,l1953
	add hl,bc
	ld a,(ix+#17)
	bit 7,a
	jr nz,l1782
	or a
	jr nz,l1735
	ld a,(hl)
	and #38
	srl a
	srl a
	srl a
	or a
	jr nz,l1736
.l1735
	ld a,(hl)
.l1736
	ld c,a
	and #07
	ld (ix+#18),a
	ld a,c
	and #f8
	srl a
	srl a
	srl a
	add (ix+#1c)
	ld c,a
	ld b,#00
	ld hl,l18a3
	add hl,bc
	ld a,(hl)
	ld hl,l18f7
	add hl,bc
	ld h,(hl)
	ld l,a
	ld c,(ix+#09)
	add hl,bc
	ld (ix+#1d),l
	ld (ix+#1e),h
	inc (ix+#17)
	ld l,(ix+#10)
	ld h,#00
	ld bc,l1953
	add hl,bc
	ld a,(hl)
	and #07
	inc a
	cp (ix+#17)
	jr nz,l17a3
	bit 7,(hl)
	ld a,#ff
	jr z,l177c
	xor a
.l177c
	ld (ix+#17),a
	jp l17a3
.l1782
	cp #ff
	jr nz,l17a3
	dec (ix+#17)
	ld c,(ix+#1c)
	ld b,#00
	ld hl,l18a3
	add hl,bc
	ld a,(hl)
	ld hl,l18f7
	add hl,bc
	ld h,(hl)
	ld l,a
	ld c,(ix+#09)
	add hl,bc
	ld (ix+#1d),l
	ld (ix+#1e),h
.l17a3
	ld a,(ix+#14)
	or a
	jr z,l17ae
	dec (ix+#14)
	jr l17f3
.l17ae
	ld a,(ix+#11)
	or a
	jr z,l17f3
	cp #ff
	jr z,l17bb
	dec (ix+#11)
.l17bb
	ld a,(ix+#15)
	and #20
	jr z,l17db
	ld l,(ix+#1d)
	ld h,(ix+#1e)
	ld c,(ix+#12)
	ld b,(ix+#13)
	srl b
	rr c
	add hl,bc
	ld (ix+#1d),l
	ld (ix+#1e),h
	jr l17f3
.l17db
	ld l,(ix+#1d)
	ld h,(ix+#1e)
	ld c,(ix+#12)
	ld b,(ix+#13)
	srl b
	rr c
	sbc hl,bc
	ld (ix+#1d),l
	ld (ix+#1e),h
.l17f3
	ret
.l17f4
	xor a
	ld (l11ec),a
	ld (l1219),a
	ld (l1246),a
	ld (l11ec),a
	ld (l1219),a
	ld (l1246),a
	ld (l113a),a
	ld de,#c000
	ld hl,#f680
	pop af
	jp l1306
;
.init_music
.l1814
;
	push af
	ld (l1325),a
	add a
	ld l,a
	add a
	add l
	ld l,a
	ld h,#00
	ld de,l1973
	add hl,de
	ld (l11c5),hl
	ld hl,l18a2
	ld (l1254),hl
	ld (l1256),hl
	ld (l1258),hl
	ld hl,l11cd
	ld de,l11ce
	ld bc,#0086
	ld (hl),#00
	ldir
	ld a,#01
	ld (l113a),a
	pop af
	ret
.l1846
	ld l,(ix+#00)
	ld h,#00
.l184c equ $ + 1
	ld bc,l197f
	add hl,bc
	ld a,(hl)
	inc (ix+#00)
	ld (ix+#09),a
	jp l138b
.l1859
	ld l,(ix+#00)
	ld h,#00
.l185f equ $ + 1
	ld bc,l197f
	add hl,bc
	ld a,(hl)
	inc (ix+#00)
	ld (ix+#01),a
	jp l138b
.l186c
	ld a,(l144f)
	ld c,a
	ld a,(l125a)
	add c
	ld (l1885),a
	ld l,(ix+#00)
	ld h,#00
.l187d equ $ + 1
	ld bc,l197f
	add hl,bc
	ld a,(hl)
	inc (ix+#00)
.l1885 equ $ + 1
	ld l,#00
	ld h,#00
	ld bc,l1195
	add hl,bc
	ld (hl),a
	jp l138b
.l1890
	ld a,(l125a)
	dec a
	ld (ix+#04),a
	jp l138b
.l189a
	ld l,(ix+#02)
	ld h,#00
	add hl,de
	ld a,(hl)
	ret
.l18a2
	db #ff
.l18a3
	db #ee,#18,#4d,#8e,#da,#2f,#8f,#f7
	db #68,#e1,#61,#e9,#77,#0c,#a7,#47
	db #ed,#98,#47,#fc,#d4,#70,#31,#f4
	db #dc,#86,#53,#24,#f6,#cc,#a4,#7e
	db #5a,#38,#18,#fa,#de,#c3,#aa,#92
	db #7b,#66,#52,#3f,#2d,#1c,#0c,#fd
	db #ef,#e1,#d5,#c9,#be,#b3,#a9,#9f
	db #96,#8e,#86,#7f,#77,#71,#6a,#64
	db #5f,#59,#54,#50,#4b,#47,#43,#3f
	db #3c,#38,#35,#32,#2f,#2d,#2a,#28
	db #26,#24,#22,#20
.l18f7
	db #0e,#0e,#0d,#0c,#0b,#0b,#0a,#09
	db #09,#08,#08,#07,#07,#07,#06,#06
	db #05,#05,#05,#04,#04,#04,#04,#03
	db #03,#03,#03,#03,#02,#02,#02,#02
	db #02,#02,#02,#01,#01,#01,#01,#01
	db #01,#01,#01,#01,#01,#01,#01,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00
.l1943
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#01,#01,#ff,#ff,#00,#00,#00
.l1953
	db #00,#01,#01,#00,#00,#00,#ff,#ff
	db #89,#89,#00,#00,#00,#00,#00,#00
	db #8a,#19,#39,#61,#00,#00,#00,#00
	db #8a,#21,#39,#61,#00,#00,#00,#00
.l1973
	dw l197f,l19c2,l19de
	dw l1a2a,l1a2b,l197f
;	dw lnew0,lnew1,lnew2	; added by Megachur
.l197f
	db #a4,#00,#04,#b0,#07,#0c,#0c,#80
	db #02,#0c,#0c,#80,#ff
;.lnew0
	db #0c,#0c,#80
	db #00,#0d,#0e,#80,#fd,#a3,#07,#80
	db #ff,#0c,#a3,#80,#00,#0c,#0e,#80
	db #fd,#a3,#07,#80,#ff
;.lnew1	; added by Megachur
	db #0c,#a3,#80,#fd,#0c,#80,#00,#0e
	db #80,#fd,#a3,#07,#80,#ff
;.lnew2	; added by Megachur
	db #0c,#a4,#80,#00,#0c,#a3,#80,#fd
	db #0c,#80,#00,#0e,#80,#fd,#12,#ff
.l19c2	; added by Megachur
	db #01,#01,#02,#80,#fe,#01,#80,#00
	db #01,#01,#02,#80,#fe,#01,#80,#00
	db #05,#08,#09,#08,#0a,#0f,#a3,#e0
	db #48,#10,#11,#ff
.l19de
	db #03,#03,#06,#e0,#48,#0b,#e5,#12
	db #0b,#e0,#51,#13,#e0,#2d,#14,#15
	db #13,#e0,#51,#14,#13,#16,#13,#e0
	db #2d,#15,#14,#e0,#09,#13,#e0,#12
	db #15,#16,#e0,#51,#13,#15,#e0,#12
	db #14,#e0,#09,#13,#e0,#12,#15,#16
	db #e0,#51,#13,#e0,#24,#15,#14,#e0
	db #09,#13,#e0,#12,#15,#16,#e0,#51
	db #13,#14,#e0,#24,#15,#16,#16,#18
	db #e0,#00,#17,#ff
.l1a2a
	db #ff
.l1a2b
	db #ff
.l1a2c
	db l1a5e,l1a62,l1a74,l1a86
	db l1a8e,l1aae,l1ab6,l1ad9
	db l1ae5,l1af5,l1b09,l1b1f
	db l1b3a,l1b46,l1b50,l1b5a
	db l1b7e,l1ba8,l1bc6,l1be6
	db l1bee,l1bf6,l1bfe,l1c0d
	db l1c17
;	db #5e,#62,#74,#86,#8e,#ae,#b6,#d9
;	db #e5,#f5,#09,#1f,#3a,#46,#50,#5a
;	db #7e,#a8,#c6,#e6,#ee,#f6,#fe,#0d
;	db #17
.l1a45
	db l1a5e/&100,l1a62/&100,l1a74/&100,l1a86/&100
	db l1a8e/&100,l1aae/&100,l1ab6/&100,l1ad9/&100
	db l1ae5/&100,l1af5/&100,l1b09/&100,l1b1f/&100
	db l1b3a/&100,l1b46/&100,l1b50/&100,l1b5a/&100
	db l1b7e/&100,l1ba8/&100,l1bc6/&100,l1be6/&100
	db l1bee/&100,l1bf6/&100,l1bfe/&100,l1c0d/&100
	db l1c17/&100
;	db #1a,#1a,#1a,#1a,#1a,#1a,#1a,#1a
;	db #1a,#1a,#1b,#1b,#1b,#1b,#1b,#1b
;	db #1b,#1b,#1b,#1b,#1b,#1b,#1b,#1c
;	db #1c
.l1a62 equ $ + 4
.l1a5e
	db #82,#09,#a0,#ff,#84,#a0,#0a,#21
	db #0a,#23,#0a,#25,#0a,#28,#0a,#25
.l1a74 equ $ + 6
	db #0a,#23,#0a,#21,#0a,#ff,#84,#a0
	db #0a,#1f,#0a,#23,#0a,#26,#0a,#2b
	db #0a,#26,#0a,#23,#0a,#1f,#0a,#ff
.l1a86
	db #80,#93,#21,#a0,#1f,#a0,#90,#ff
.l1a8e
	db #83,#09,#0a,#09,#0a,#07,#0a,#07
	db #0a,#04,#0a,#04,#0a,#07,#0a,#09
	db #14,#09,#0a,#07,#0a,#07,#0a,#04
	db #0a,#04,#0a,#07,#0a,#07,#0a,#ff
.l1aae
	db #85,#c0,#00,#01,#a0,#06,#a0,#ff
.l1ab6
	db #86,#06,#0a,#06,#0a,#81,#0d,#14
	db #86,#06,#0a,#06,#0a,#81,#0d,#0a
	db #86,#06,#14,#06,#0a,#81,#0d,#14
	db #86,#06,#0a,#81,#0d,#0a,#0d,#0a
.l1ad9 equ $ + 3
	db #0d,#0a,#ff,#83,#09,#0a,#09,#0a
.l1ae5 equ $ + 7
	db #81,#0d,#0a,#83,#09,#0a,#ff,#87
	db #a0,#14,#25,#1e,#23,#1e,#26,#1e
.l1af5 equ $ + 7
	db #25,#1e,#23,#0a,#25,#0a,#ff,#87
	db #26,#0a,#26,#0a,#25,#1e,#26,#0a
	db #26,#0a,#25,#32,#26,#0a,#26,#0a
.l1b09 equ $ + 3
	db #28,#14,#ff,#87,#26,#0a,#26,#0a
	db #25,#1e,#26,#0a,#26,#0a,#25,#1e
	db #23,#0a,#25,#14,#23,#0a,#21,#14
.l1b1f equ $ + 1
	db #ff,#85,#e0,#00,#02,#a0,#36,#a0
	db #80,#2a,#0a,#2a,#0a,#28,#1e,#2a
	db #0a,#2a,#0a,#28,#32,#2a,#0a,#2a
.l1b3a equ $ + 4
	db #0a,#28,#14,#ff,#83,#0e,#0a,#0e
	db #0a,#81,#0d,#0a,#83,#0e,#0a,#ff
.l1b46
	db #83,#0e,#1e,#0e,#1e,#10,#1e,#10
.l1b50 equ $ + 2
	db #1e,#ff,#83,#0e,#0a,#10,#0a,#10
.l1b5a equ $ + 4
	db #0a,#10,#0a,#ff,#87,#21,#0a,#21
	db #0a,#21,#0a,#21,#0a,#21,#14,#21
	db #0a,#23,#14,#25,#3c,#25,#0a,#25
	db #14,#25,#14,#28,#14,#25,#14,#23
	db #1e,#21,#1e,#25,#1e,#23,#28,#ff
.l1b7e
	db #80,#93,#28,#0a,#28,#0a,#28,#0a
	db #92,#2a,#14,#90,#87,#2a,#28,#25
	db #0a,#25,#0a,#28,#14,#25,#0a,#28
	db #14,#25,#0a,#23,#0a,#21,#0a,#23
	db #14,#25,#0a,#23,#14,#21,#0a,#1e
.l1ba8 equ $ + 2
	db #46,#ff,#87,#25,#0a,#23,#0a,#21
	db #0a,#23,#14,#25,#0a,#23,#1e,#21
	db #0a,#1e,#3c,#28,#0a,#28,#0a,#2a
	db #8c,#26,#0a,#26,#0a,#25,#14,#ff
.l1bc6
	db #83,#09,#0a,#09,#0a,#07,#0a,#07
	db #0a,#04,#0a,#04,#0a,#07,#0a,#09
	db #14,#09,#0a,#07,#0a,#07,#0a,#04
	db #0a,#05,#0a,#05,#0a,#0c,#14,#ff
.l1be6
	db #80,#e0,#32,#00,#50,#36,#50,#ff
.l1bee
	db #80,#c0,#0f,#00,#28,#06,#28,#ff
.l1bf6
	db #80,#e0,#0a,#00,#28,#36,#28,#ff
.l1bfe
	db #86,#e0,#14,#00,#ff,#23,#0a,#20
.l1c0d equ $ + 7
	db #0a,#1e,#0a,#1b,#0a,#bf,#ff,#a0
	db #0a,#87,#1e,#0a,#1e,#0a,#1c,#14
.l1c17 equ $ + 1
	db #ff,#86,#e0,#23,#00,#ff,#23,#05
	db #23,#05,#20,#05,#20,#05,#1e,#05
	db #1e,#05,#1b,#05,#1b,#05,#bf,#ff

.l1c2e
	db #0f,#0f,#0f,#0d,#08,#06,#05,#04
	db #03,#01,#82,#83,#83,#89,#90,#99
.l1c3e
	db #0f,#0d,#07,#04,#03,#02,#02,#01
	db #01,#82,#85,#88,#89,#9c,#ae,#cb
.l1c4e
	ld b,#f4
	out (c),c
	ld b,h
	out (c),d
	out (c),e
	ld b,#f4
	out (c),a
	ld b,h
	out (c),l
	out (c),e
	ret
;org #0fe8
;ld a,(#113a)
;or a
;call z,#1130
;call #1133

.game_name
	db "Mask Two",0
.game_year
	db "1988",0
.game_publisher
	db "Gremlin Graphics",0
.music_author
	db "Ben Daglish",0
.music_comment
	db "",0
	
	read "music_end_v1_0.asm"
